home *** CD-ROM | disk | FTP | other *** search
/ PD Collection CD 1 / PD Collection CD 1.iso / textual / tex / files / !tex / TeXsource / commontex / h / pack < prev    next >
Encoding:
Text File  |  1988-04-08  |  999 b   |  42 lines
  1. /*
  2.  *    Copyright 1986, 1987 Pat Joseph Monardo. All rights reserved.
  3.  *    Copying of this file is granted according to the provisions 
  4.  *    specified in the file COPYING which must accompany this file.
  5.  */
  6.  
  7.  
  8. /*
  9.  *        pack.h
  10.  */
  11.  
  12. #define    EXACTLY                0
  13. #define    ADDITIONAL            1
  14. #define    NATURAL                0L, ADDITIONAL
  15.  
  16. global    ptr        adjust_tail;
  17. global    scal    total_stretch[];
  18. global    scal    total_shrink[];
  19.  
  20. global    long    pack_begin_line;
  21.  
  22. #define    make_char_from_lig() \
  23.     {mem[lig_trick] = mem[lig_char(p)]; \
  24.     link(lig_trick) = link(p); \
  25.     p = lig_trick;}
  26.  
  27. #define    get_stretch_order() \
  28.     {if (total_stretch[FILLL] != 0) o = FILLL; \
  29.     else if (total_stretch[FILL] != 0) o = FILL; \
  30.     else if (total_stretch[FIL] != 0) o = FIL; \
  31.     else o = NORMAL;}
  32.             
  33. #define    get_shrink_order() \
  34.     {if (total_shrink[FILLL] != 0) o = FILLL; \
  35.     else if (total_shrink[FILL] != 0) o = FILL; \
  36.     else if (total_shrink[FIL] != 0) o = FIL; \
  37.     else o = NORMAL;}
  38.  
  39. #define    vpack(P, H)         vpackage(P, H, MAX_DIMEN)
  40. ptr        vpackage();
  41. ptr        hpack();
  42.